  '----------------CODE MODULE---------------

   IF winFlagCODES=1 THEN WAIT

    WindowWidth = 528
    WindowHeight = 350

    groupbox #CODES.groupbox1, "CODE SUMMARY", 14, 46, 496, 265
    statictext #1.stxt1, "Click Button to Begin", 30, 76, 464, 215
    open "CODE SUMMARY" for window as #CODES
    print #CODES, "font ms_sans_serif 0 16"
    winFlagCODES=1

[CODES.inputLoop]   'wait here for input event
    wait


[quitCODES]

  close #CODES
  wait
winFlagCODES=0
